package cn.dw.utils;

import java.awt.BasicStroke;
import java.awt.Graphics;
import java.awt.Graphics2D;
import java.awt.Image;
import java.awt.Shape;
import java.awt.geom.RoundRectangle2D;
import java.awt.image.BufferedImage;
import java.io.File;
import java.io.OutputStream;
import java.util.Hashtable;
import java.util.Random;

import javax.imageio.ImageIO;

import com.google.zxing.BarcodeFormat;
import com.google.zxing.BinaryBitmap;
import com.google.zxing.DecodeHintType;
import com.google.zxing.EncodeHintType;
import com.google.zxing.MultiFormatReader;
import com.google.zxing.MultiFormatWriter;
import com.google.zxing.Result;
import com.google.zxing.common.BitMatrix;
import com.google.zxing.common.HybridBinarizer;
import com.google.zxing.qrcode.decoder.ErrorCorrectionLevel;



@SuppressWarnings({ "rawtypes", "unchecked", "unused"})
public class QRCodeUtil {
	private static final String CHARSET = "utf-8";
	private static final String FORMAT_NAME = "JPG";
	private static final int QRCODE_SIZE = 300;

	private static final int WIDTH = 60;
	private static final int HEIGHT = 60;

	private static BufferedImage createImage(String content, String imgPath, boolean needCompress) throws Exception {
		Hashtable hints = new Hashtable<>();
		hints.put(EncodeHintType.ERROR_CORRECTION, ErrorCorrectionLevel.H);
		hints.put(EncodeHintType.CHARACTER_SET, "utf-8");
		hints.put(EncodeHintType.MARGIN, Integer.valueOf(1));
		BitMatrix bitMatrix = new MultiFormatWriter().encode(content, BarcodeFormat.QR_CODE, 300, 300, hints);
		int width = bitMatrix.getWidth();
		int height = bitMatrix.getHeight();
		BufferedImage image = new BufferedImage(width, height, 1);
		for (int x = 0; x < width; x++) {
			for (int y = 0; y < height; y++) {
				image.setRGB(x, y, bitMatrix.get(x, y) ? -16777216 : -1);
			}
		}
		if ((imgPath == null) || ("".equals(imgPath))) {
			return image;
		}
		insertImage(image, imgPath, needCompress);
		return image;
	}

	private static void insertImage(BufferedImage source, String imgPath, boolean needCompress) throws Exception {
		File file = new File(imgPath);
		if (!file.exists()) {
			System.err.println(imgPath + "   该文件不存在！");
			return;
		}
		Image src = ImageIO.read(new File(imgPath));
		int width = src.getWidth(null);
		int height = src.getHeight(null);
		if (needCompress) {
			if (width > 60) {
				width = 60;
			}
			if (height > 60) {
				height = 60;
			}
			Image image = src.getScaledInstance(width, height, 4);
			BufferedImage tag = new BufferedImage(width, height, 1);
			Graphics g = tag.getGraphics();
			g.drawImage(image, 0, 0, null);
			g.dispose();
			src = image;
		}
		Graphics2D graph = source.createGraphics();
		int x = (300 - width) / 2;
		int y = (300 - height) / 2;
		graph.drawImage(src, x, y, width, height, null);
		Shape shape = new RoundRectangle2D.Float(x, y, width, width, 6.0F, 6.0F);
		graph.setStroke(new BasicStroke(3.0F));
		graph.draw(shape);
		graph.dispose();
	}

	public static String encode(String content, String imgPath, String destPath, boolean needCompress)
			throws Exception {
		BufferedImage image = createImage(content, imgPath, needCompress);
		mkdirs(destPath);
		String file = new Random().nextInt(99999999) + ".png";
		ImageIO.write(image, "JPG", new File(destPath + "/" + file));
		return file;
	}

	public static void mkdirs(String destPath) {
		File file = new File(destPath);
		if ((!file.exists()) && (!file.isDirectory())) {
			file.mkdirs();
		}
	}

	public static void encode(String content, String imgPath, String destPath) throws Exception {
		encode(content, imgPath, destPath, false);
	}

	public static void encode(String content, String destPath, boolean needCompress) throws Exception {
		encode(content, null, destPath, needCompress);
	}

	public static void encode(String content, String destPath) throws Exception {
		encode(content, null, destPath, false);
	}

	public static void encode(String content, String imgPath, OutputStream output, boolean needCompress)
			throws Exception {
		BufferedImage image = createImage(content, imgPath, needCompress);
		ImageIO.write(image, "JPG", output);
	}

	public static void encode(String content, OutputStream output) throws Exception {
		encode(content, null, output, false);
	}

	public static String decode(File file) throws Exception {
		BufferedImage image = ImageIO.read(file);
		if (image == null) {
			return null;
		}
		BufferedImageLuminanceSource source = new BufferedImageLuminanceSource(image);
		BinaryBitmap bitmap = new BinaryBitmap(new HybridBinarizer(source));

		Hashtable hints = new Hashtable<>();
		hints.put(DecodeHintType.CHARACTER_SET, "utf-8");
		Result result = new MultiFormatReader().decode(bitmap, hints);
		String resultStr = result.getText();
		return resultStr;
	}

	public static String decode(String path) throws Exception {
		return decode(new File(path));
	}

	public String QRbuild(String poid) throws Exception {
		File directory = new File("");

		String text = poid;
		String file = encode(text, "", "/apache-tomcat-7.0.73/webapps/math_app/Qrimg/", true);
		System.out.println(directory.getAbsolutePath());

		System.out.println(file);

		String path = "/Qrimg/" + file;

		return path;
	}

	public static void main(String[] args) throws Exception {
		File directory = new File("WebRoot");

		String text = "http://www.dans88.com.cn";
		String file = encode(text, "", "/Qrimg/", true);
		System.out.println(directory.getPath());
	}
}
